(rmail-summary-kill-label): Call rmail-kill-label

with only one argument.

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index 8c39497921f57f46dd4f50988bad4e78d7c91583..b059235f58e35f4969fbf6f3d8c3691c4150a54f 100644 (file)
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -1166,7 +1166,7 @@ Completion is performed over known labels when reading."
   (interactive (list (with-current-buffer rmail-buffer
                       (rmail-read-label "Kill label" t))))
   (with-current-buffer rmail-buffer
-    (rmail-kill-label label nil)))
+    (rmail-kill-label label)))
 \f
 ;;;; *** Rmail Summary Mailing Commands ***